www.gusucode.com > 落叶冰点万能企业网站内容管理系统 V9.1 > 落叶冰点万能企业网站内容管理系统 V9.1\code\inc\ND_js_asp_ajax_template.asp

    



$complie$zxml.js$




function AJAXcreateXMLdocument$complie$rnd$(){

oxmldom$complie$rnd$=zXmlDom.createDocument();

return oxmldom$complie$rnd$




}



var show_biaozi_start$complie$rnd$="$complie$bz_start$";
var show_biaozi_end$complie$rnd$="$complie$bz_end$";
var ajax_asp_file_temp$complie$rnd$="$complie$ajax_asp_file_temp$";
var ajax_asp_file$complie$rnd$="$complie$ajax_asp_file$";

var html_file_div_name$complie$rnd$="$complie$html_file_div_name$";

<%




function replace_huanhangz(cont)

cont=replace(cont,vbcrlf,"$$sx_aspcodex_huanhang$")

cont=replace(cont,chr(10),"$$sx_aspcodex_huanhang$")
cont= Replace(cont, CHR(13), "$$sx_aspcodex_huanhang$")
cont= Replace(cont, CHR(9), "$$sx_aspcodex_huanhang$")
cont=replace(cont,"=","$zzdenghaoaspcpu1$")
cont=replace(cont,"&","$zzadnnhaoaspcpu1$")
cont=replace(cont,"?","$zzwnnehaoaspcpu1$")


replace_huanhangz=cont

end function









		Function UrlEncoding_x(DataStr)

			StrReturn = ""
			For Si = 1 To Len(DataStr)
				ThisChr = Mid(DataStr, Si, 1)
				If Abs(Asc(ThisChr)) < &HFF Then
					StrReturn = StrReturn & ThisChr
				Else
					InnerCode = Asc(ThisChr)
					If InnerCode < 0 Then
					   InnerCode = InnerCode + &H10000
					End If
					Hight8 = (InnerCode And &HFF00) \ &HFF
					Low8 = InnerCode And &HFF
					StrReturn = StrReturn & "%" & Hex(Hight8) & "%" & Hex(Low8)
				End If
			Next
			UrlEncoding_x = StrReturn
		End Function










ajax_asp_file_url_cang=UrlEncoding_x(replace_huanhangz(request("ajax_asp_file_url_cang")))
%>

var ajax_asp_file_url_cang$complie$rnd$="<%=replace(ajax_asp_file_url_cang,chr(34),"")%>";


if (ajax_asp_file_url_cang$complie$rnd$!=""){
ajax_asp_file_temp$complie$rnd$=ajax_asp_file_temp$complie$rnd$+"?"+"ajax_asp_file_url_cang="+ajax_asp_file_url_cang$complie$rnd$;
}

if (ajax_asp_file_url_cang$complie$rnd$==""){
ajax_asp_file_temp$complie$rnd$=ajax_asp_file_temp$complie$rnd$+"?ajax_asp_file"+"="+ajax_asp_file$complie$rnd$+"&show_biaozi_start="+show_biaozi_start$complie$rnd$+"&show_biaozi_end="+show_biaozi_end$complie$rnd$;
}
else
{
ajax_asp_file_temp$complie$rnd$=ajax_asp_file_temp$complie$rnd$+"&ajax_asp_file"+"="+ajax_asp_file$complie$rnd$+"&show_biaozi_start="+show_biaozi_start$complie$rnd$+"&show_biaozi_end="+show_biaozi_end$complie$rnd$;
}






var a$complie$rnd$=AJAXcreateXMLdocument$complie$rnd$();



eval("document.all."+html_file_div_name$complie$rnd$).innerHTML="<img src='../inc/Loading.gif' border=0> 数据载入中......";

a$complie$rnd$.onreadystatechange=function(){
if (a$complie$rnd$.readyState==4)
{



if (a$complie$rnd$.parseError.errorCode!=0){


eval("document.all."+html_file_div_name$complie$rnd$).innerHTML="数据读取错误,请重试";
}

var root$complie$rnd$=a$complie$rnd$.documentElement;
var dataa$complie$rnd$=root$complie$rnd$.firstChild.text;


dataa$complie$rnd$=dataa$complie$rnd$.replace(/\$nd_cdta_jiesu_x\$/igm,"]]>");

eval("document.all."+html_file_div_name$complie$rnd$).innerHTML=dataa$complie$rnd$;






}
}
a$complie$rnd$.async=true; //异步模式
a$complie$rnd$.load(ajax_asp_file_temp$complie$rnd$);